home *** CD-ROM | disk | FTP | other *** search
/ Aminet 19 / Aminet 19 (1997)(GTI - Schatztruhe)[!][Jun 1997].iso / Aminet / misc / sci / chimicad.lha / ChimiCadInstall / Installa_it < prev    next >
Text File  |  1997-03-12  |  3KB  |  158 lines
  1. ; ChimiCad Installer Script
  2. ; $VER: chimiCad.install 39.1 (22/08/96)
  3. ;
  4.  
  5. ; RICHIESTA DI DOVE INSTALLARE ChimiCad
  6. (set dove (askdir
  7.   (prompt "Scelta per installazione directory ChimiCad.")
  8.   (default "sys:")
  9.   (help
  10.     (cat "Si sceglie da qui in quale directory inserire i files di ChimiCad. "
  11.          "Tali files saranno contenuti in una directory chiamata CHIMICAD, "
  12.          "che sara` automaticamente creata dal programma di installazione. "
  13.     ))
  14. ))
  15.  
  16. ;Crea directory
  17. (makedir (tackon dove "chimicad")
  18.  
  19. )
  20.  
  21. (makedir (tackon dove "chimicad/ACCESSORI")
  22.  
  23. )
  24.  
  25. (makedir (tackon dove "chimicad/MANUALI")
  26.  
  27. )
  28.  
  29. (makedir (tackon dove "chimicad/ACCESSORI/ROTAZIONI")
  30.  
  31. )
  32.  
  33. (makedir (tackon dove "chimicad/ACCESSORI/LIBS")
  34.  
  35. )
  36.  
  37. (makedir (tackon dove "chimicad/ACCESSORI/BANCHI")
  38.  
  39. )
  40.  
  41. ;Copia dei files
  42. (copyfiles
  43.   (prompt "Sto copiando l' icona del cassetto.")
  44.   (help @copyfiles-help)
  45.   (source "chimicad.info")
  46.   (dest dove)
  47.       
  48. )
  49.  
  50. (copyfiles
  51.   (prompt "Sto copiando l' icona del cassetto.")
  52.   (help @copyfiles-help)
  53.   (source "chimicad.info")
  54.   (dest (tackon dove "chimicad"))
  55.   (newname "MANUALI.info")
  56.       
  57. )
  58.  
  59. (copyfiles
  60.   (prompt "Sto copiando il programma.")
  61.   (help @copyfiles-help)
  62.   (source "progr/italiano")
  63.   (dest (tackon dove "chimicad"))
  64.   (all)
  65.       
  66. )
  67.  
  68. (copyfiles
  69.   (prompt "Sto copiando la documentazione.")
  70.   (help @copyfiles-help)
  71.   (source "doc/italiano")
  72.   (dest (tackon dove "chimicad/manuali"))
  73.   (all)
  74.       
  75. )
  76.  
  77.  
  78. (copyfiles
  79.   (prompt "Sto copiando l'interfaccia.")
  80.   (help @copyfiles-help)
  81.   (source "access/interfaccia")
  82.   (dest (tackon dove "chimicad/ACCESSORI"))
  83.         
  84. )
  85.  
  86. (copyfiles
  87.   (prompt "Sto copiando i settings.")
  88.   (help @copyfiles-help)
  89.   (source "access/chimicad.settings")
  90.   (dest (tackon dove "chimicad/ACCESSORI"))
  91.         
  92. )
  93.  
  94. (copyfiles
  95.   (prompt "Sto copiando gli shapes.")
  96.   (help @copyfiles-help)
  97.   (source "access/shapes.shp")
  98.   (dest (tackon dove "chimicad/ACCESSORI"))
  99.         
  100. )
  101.  
  102. (copyfiles
  103.   (prompt "Sto copiando le rotazioni.")
  104.   (help @copyfiles-help)
  105.   (source "access/rotazioni")
  106.   (dest (tackon dove "chimicad/ACCESSORI/ROTAZIONI"))
  107.   (all)
  108.       
  109. )
  110.  
  111. (copyfiles
  112.   (prompt "Sto copiando il font Symbol.")
  113.   (help @copyfiles-help)
  114.   (source "access/fonts")
  115.   (dest "fonts:")
  116.   (all)
  117.       
  118. )
  119.  
  120. (copyfiles
  121.   (prompt "Sto copiando le librerie.")
  122.   (help @copyfiles-help)
  123.   (source "access/libs")
  124.   (dest (tackon dove "chimicad/ACCESSORI/LIBS"))
  125.   (all)
  126.       
  127. )
  128.  
  129. (copyfiles
  130.   (prompt "Sto copiando i banchi pennelli.")
  131.   (help @copyfiles-help)
  132.   (source "access/BANCHI")
  133.   (dest (tackon dove "chimicad/ACCESSORI/BANCHI"))
  134.   (all)
  135.       
  136. )
  137.  
  138.  
  139. ;Inserimento del path di chimicad in un ASSIGN in user-Startup
  140.  
  141. (startup "ChimiCad"
  142.   (prompt "Vuoi inserire l' ASSIGN necessario nella tua user-startup?")
  143.   (help
  144.     (cat "Senza questo assign il programma non puo` trovare i files a "
  145.          "lui necessari."))
  146.  
  147.   (command "assign CHICAD: " (tackon dove "chimicad/ACCESSORI") "\n"
  148.        "assign libs: " (tackon dove "chimicad/ACCESSORI/LIBS") " add")
  149.         
  150. )
  151.  
  152.  
  153. ; Uscita dopo fine installazione
  154. (exit
  155.     (cat "Prima di poter eseguire ChimiCad si deve resettare il "
  156.      "sistema." ))
  157.  
  158.